home *** CD-ROM | disk | FTP | other *** search
/ Programmer Plus 2007 / Programmer-Plus-2007.iso / Programming / Microsoft Plateform / Visual Basic 5.0 / Msvb50.ace / msvb50 / MSVB50 / VB / VBONLINE / VBONLINE.M14 / AVP05014.BMP (.png) < prev    next >
Multiple Resolution Bitmap  |  1997-01-11  |  17.1 KB  |  457x500  |  4-bit (10 colors)
   ocr: -Object Listbox Procedure Listbox Projecti - frmSetlime - X (General) (Declarations) Private Sub Form Load() If Recorder.StartRecording <> Empty Then txtStart.Text - Recorder.StartRecording End If If Recorder.StopRecording <> Empty Then CxtEna.Text - Recorder.StopRecording End If cxtchannel = Recorder.Channel End Sub Function ValidateTime (Time As String, reld As Ca Dim strMsg As String If IsDate (Time) Then Field.Text = Format $ (Time, "h:mm AM/PM") ValidateTime = True Else strMsg = "Please enter a valld time! (Hoi MsgBox strMsg, VDOKONly, "Invalid Time" Field.SetFocus valldatelime = raise En ...